#define room_idx
/* Returns the room index given the room name.
 * argument0 room name
 * returns real
 */
idx = room_first;
for(idx = room_first;idx <= room_last;idx+= 1) {
    if(room_get_name(idx) == argument0) {
        return idx;
    }
}
return -1;

